/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / demos / _the4th / code

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 30 39 37 |@0000900|0,000097|
|00000040| 30 30 00 73 00 97 00 00 | 50 87 00 00 00 07 00 00 |00.s....|P.......|
|00000050| 0d 00 00 1c f4 3e 61 64 | 66 73 3a 3a 54 41 53 64 |.....>ad|fs::TASd|
|00000060| 65 6d 6f 34 2e 24 2e 43 | 6f 64 65 32 0d 00 50 23 |emo4.$.C|ode2..P#|
|00000070| ee 20 85 20 eb 31 32 3a | f6 3a f1 22 20 61 74 20 |. . .12:|.:." at |
|00000080| 6c 69 6e 65 20 3a 20 22 | 3b 9e 3a f2 65 6e 64 0d |line : "|;.:.end.|
|00000090| 00 64 21 ff 20 22 50 6c | 61 79 4d 6f 64 20 3c 4f |.d!. "Pl|ayMod <O|
|000000a0| 62 65 79 24 44 69 72 3e | 2e 4d 75 73 69 6b 6b 22 |bey$Dir>|.Musikk"|
|000000b0| 0d 00 6e 22 ff 20 22 53 | 63 72 6f 6c 6c 46 69 6c |..n". "S|crollFil|
|000000c0| 65 20 3c 4f 62 65 79 24 | 44 69 72 3e 2e 74 65 78 |e <Obey$|Dir>.tex|
|000000d0| 74 22 0d 00 82 08 eb 20 | 31 35 0d 00 8c 08 eb 20 |t"..... |15..... |
|000000e0| 31 33 0d 00 96 05 87 0d | 00 a0 10 ff 20 22 53 63 |13......|.... "Sc|
|000000f0| 72 6f 6c 6c 4f 6e 22 0d | 00 aa 09 f2 69 6e 69 74 |rollOn".|....init|
|00000100| 0d 00 b4 08 f2 67 6f 31 | 0d 00 be 09 f2 6d 65 73 |.....go1|.....mes|
|00000110| 73 0d 00 c8 0b dd 20 f2 | 69 6e 69 74 0d 00 dc 1a |s..... .|init....|
|00000120| de 20 73 70 20 26 34 30 | 30 30 30 3a 21 73 70 3d |. sp &40|000:!sp=|
|00000130| 26 34 30 30 30 30 0d 00 | e6 1b 73 70 21 34 3d 30 |&40000..|..sp!4=0|
|00000140| 3a 73 70 21 38 3d 31 36 | 3a 73 70 21 31 32 3d 31 |:sp!8=16|:sp!12=1|
|00000150| 36 0d 01 04 12 78 25 3d | 31 32 38 30 3a 79 25 3d |6....x%=|1280:y%=|
|00000160| 35 30 30 0d 01 22 1b 78 | 32 25 3d 31 32 38 30 3a |500..".x|2%=1280:|
|00000170| 79 32 25 3d 32 35 30 3a | 69 6e 78 25 3d 30 0d 01 |y2%=250:|inx%=0..|
|00000180| 2c 05 e1 0d 01 40 0a dd | 20 f2 67 6f 31 0d 01 54 |,....@..| .go1..T|
|00000190| 2e c8 99 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |..."OS_S|priteOp"|
|000001a0| 2c 32 36 36 2c 73 70 2c | 22 3c 4f 62 65 79 24 44 |,266,sp,|"<Obey$D|
|000001b0| 69 72 3e 2e 62 69 6c 64 | 65 72 22 0d 01 5e 09 42 |ir>.bild|er"..^.B|
|000001c0| 31 25 3d 31 0d 01 68 09 | 42 32 25 3d 32 0d 01 7c |1%=1..h.|B2%=2..||
|000001d0| 05 f5 0d 01 86 22 78 25 | 2d 3d 37 32 3a 79 25 2b |....."x%|-=72:y%+|
|000001e0| 3d 32 34 3a 78 32 25 2d | 3d 38 30 3a 69 6e 78 25 |=24:x2%-|=80:inx%|
|000001f0| 2b 3d 37 32 0d 01 90 1b | e7 20 78 32 25 3c 3d 2d |+=72....|. x2%<=-|
|00000200| 32 30 30 30 20 8c 20 78 | 32 25 3d 31 32 38 30 0d |2000 . x|2%=1280.|
|00000210| 01 9a 0f 42 31 25 3d 42 | 31 25 20 82 20 33 0d 01 |...B1%=B|1% . 3..|
|00000220| a4 0f 42 32 25 3d 42 32 | 25 20 82 20 33 0d 01 ae |..B2%=B2|% . 3...|
|00000230| 06 c8 96 0d 01 b8 17 c8 | 99 22 4f 53 5f 42 79 74 |........|."OS_Byt|
|00000240| 65 22 2c 31 31 33 2c 42 | 31 25 0d 01 c2 17 c8 99 |e",113,B|1%......|
|00000250| 22 4f 53 5f 42 79 74 65 | 22 2c 31 31 32 2c 42 32 |"OS_Byte|",112,B2|
|00000260| 25 0d 01 cc 28 c8 99 22 | 4f 53 5f 53 70 72 69 74 |%...(.."|OS_Sprit|
|00000270| 65 4f 70 22 2c 33 30 38 | 2c 73 70 2c 22 70 69 63 |eOp",308|,sp,"pic|
|00000280| 22 2c 30 2c 32 35 30 2c | 30 0d 01 d6 2e c8 99 22 |",0,250,|0......"|
|00000290| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 33 30 38 |OS_Sprit|eOp",308|
|000002a0| 2c 73 70 2c 22 62 61 6c | 6c 22 2c 69 6e 78 25 2c |,sp,"bal|l",inx%,|
|000002b0| 38 38 30 2c 26 30 38 0d | 01 e0 2f c8 99 22 4f 53 |880,&08.|../.."OS|
|000002c0| 5f 53 70 72 69 74 65 4f | 70 22 2c 33 30 38 2c 73 |_SpriteO|p",308,s|
|000002d0| 70 2c 22 34 22 2c 69 6e | 78 25 2d 33 30 30 2c 38 |p,"4",in|x%-300,8|
|000002e0| 31 30 2c 26 30 38 0d 01 | ea 32 c8 99 22 4f 53 5f |10,&08..|.2.."OS_|
|000002f0| 53 70 72 69 74 65 4f 70 | 22 2c 33 30 38 2c 73 70 |SpriteOp|",308,sp|
|00000300| 2c 22 62 61 6c 6c 22 2c | 69 6e 78 25 2d 35 30 30 |,"ball",|inx%-500|
|00000310| 2c 38 38 30 2c 26 30 38 | 0d 01 f4 2a c8 99 22 4f |,880,&08|...*.."O|
|00000320| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 33 30 38 2c |S_Sprite|Op",308,|
|00000330| 73 70 2c 22 74 22 2c 78 | 32 25 2c 79 32 25 2c 26 |sp,"t",x|2%,y2%,&|
|00000340| 30 38 0d 01 fe 2e c8 99 | 22 4f 53 5f 53 70 72 69 |08......|"OS_Spri|
|00000350| 74 65 4f 70 22 2c 33 30 | 38 2c 73 70 2c 22 61 22 |teOp",30|8,sp,"a"|
|00000360| 2c 78 32 25 2b 31 30 30 | 2c 79 32 25 2c 26 30 38 |,x2%+100|,y2%,&08|
|00000370| 0d 02 08 2e c8 99 22 4f | 53 5f 53 70 72 69 74 65 |......"O|S_Sprite|
|00000380| 4f 70 22 2c 33 30 38 2c | 73 70 2c 22 73 22 2c 78 |Op",308,|sp,"s",x|
|00000390| 32 25 2b 32 30 30 2c 79 | 32 25 2c 26 30 38 0d 02 |2%+200,y|2%,&08..|
|000003a0| 12 2e c8 99 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |...."OS_|SpriteOp|
|000003b0| 22 2c 33 30 38 2c 73 70 | 2c 22 3d 22 2c 78 32 25 |",308,sp|,"=",x2%|
|000003c0| 2b 34 30 30 2c 79 32 25 | 2c 26 30 38 0d 02 1c 2e |+400,y2%|,&08....|
|000003d0| c8 99 22 4f 53 5f 53 70 | 72 69 74 65 4f 70 22 2c |.."OS_Sp|riteOp",|
|000003e0| 33 30 38 2c 73 70 2c 22 | 74 22 2c 78 32 25 2b 36 |308,sp,"|t",x2%+6|
|000003f0| 30 30 2c 79 32 25 2c 26 | 30 38 0d 02 26 2e c8 99 |00,y2%,&|08..&...|
|00000400| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 33 30 |"OS_Spri|teOp",30|
|00000410| 38 2c 73 70 2c 22 68 22 | 2c 78 32 25 2b 37 30 30 |8,sp,"h"|,x2%+700|
|00000420| 2c 79 32 25 2c 26 30 38 | 0d 02 30 2e c8 99 22 4f |,y2%,&08|..0..."O|
|00000430| 53 5f 53 70 72 69 74 65 | 4f 70 22 2c 33 30 38 2c |S_Sprite|Op",308,|
|00000440| 73 70 2c 22 65 22 2c 78 | 32 25 2b 38 30 30 2c 79 |sp,"e",x|2%+800,y|
|00000450| 32 25 2c 26 30 38 0d 02 | 3a 2f c8 99 22 4f 53 5f |2%,&08..|:/.."OS_|
|00000460| 53 70 72 69 74 65 4f 70 | 22 2c 33 30 38 2c 73 70 |SpriteOp|",308,sp|
|00000470| 2c 22 61 22 2c 78 32 25 | 2b 31 30 30 30 2c 79 32 |,"a",x2%|+1000,y2|
|00000480| 25 2c 26 30 38 0d 02 44 | 2f c8 99 22 4f 53 5f 53 |%,&08..D|/.."OS_S|
|00000490| 70 72 69 74 65 4f 70 22 | 2c 33 30 38 2c 73 70 2c |priteOp"|,308,sp,|
|000004a0| 22 72 22 2c 78 32 25 2b | 31 31 30 30 2c 79 32 25 |"r",x2%+|1100,y2%|
|000004b0| 2c 26 30 38 0d 02 4e 2f | c8 99 22 4f 53 5f 53 70 |,&08..N/|.."OS_Sp|
|000004c0| 72 69 74 65 4f 70 22 2c | 33 30 38 2c 73 70 2c 22 |riteOp",|308,sp,"|
|000004d0| 63 22 2c 78 32 25 2b 31 | 32 30 30 2c 79 32 25 2c |c",x2%+1|200,y2%,|
|000004e0| 26 30 38 0d 02 58 2f c8 | 99 22 4f 53 5f 53 70 72 |&08..X/.|."OS_Spr|
|000004f0| 69 74 65 4f 70 22 2c 33 | 30 38 2c 73 70 2c 22 73 |iteOp",3|08,sp,"s|
|00000500| 22 2c 78 32 25 2b 31 34 | 30 30 2c 79 32 25 2c 26 |",x2%+14|00,y2%,&|
|00000510| 30 38 0d 02 62 2f c8 99 | 22 4f 53 5f 53 70 72 69 |08..b/..|"OS_Spri|
|00000520| 74 65 4f 70 22 2c 33 30 | 38 2c 73 70 2c 22 61 22 |teOp",30|8,sp,"a"|
|00000530| 2c 78 32 25 2b 31 35 30 | 30 2c 79 32 25 2c 26 30 |,x2%+150|0,y2%,&0|
|00000540| 38 0d 02 6c 2f c8 99 22 | 4f 53 5f 53 70 72 69 74 |8..l/.."|OS_Sprit|
|00000550| 65 4f 70 22 2c 33 30 38 | 2c 73 70 2c 22 69 22 2c |eOp",308|,sp,"i",|
|00000560| 78 32 25 2b 31 36 30 30 | 2c 79 32 25 2c 26 30 38 |x2%+1600|,y2%,&08|
|00000570| 0d 02 76 2f c8 99 22 4f | 53 5f 53 70 72 69 74 65 |..v/.."O|S_Sprite|
|00000580| 4f 70 22 2c 33 30 38 2c | 73 70 2c 22 6c 22 2c 78 |Op",308,|sp,"l",x|
|00000590| 32 25 2b 31 37 30 30 2c | 79 32 25 2c 26 30 38 0d |2%+1700,|y2%,&08.|
|000005a0| 02 80 2f c8 99 22 4f 53 | 5f 53 70 72 69 74 65 4f |../.."OS|_SpriteO|
|000005b0| 70 22 2c 33 30 38 2c 73 | 70 2c 22 6f 22 2c 78 32 |p",308,s|p,"o",x2|
|000005c0| 25 2b 31 38 30 30 2c 79 | 32 25 2c 26 30 38 0d 02 |%+1800,y|2%,&08..|
|000005d0| 8a 2f c8 99 22 4f 53 5f | 53 70 72 69 74 65 4f 70 |./.."OS_|SpriteOp|
|000005e0| 22 2c 33 30 38 2c 73 70 | 2c 22 72 22 2c 78 32 25 |",308,sp|,"r",x2%|
|000005f0| 2b 31 39 30 30 2c 79 32 | 25 2c 26 30 38 0d 02 9e |+1900,y2|%,&08...|
|00000600| 2a c8 99 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |*.."OS_S|priteOp"|
|00000610| 2c 33 30 38 2c 73 70 2c | 22 6d 69 67 22 2c 78 25 |,308,sp,|"mig",x%|
|00000620| 2c 79 25 2c 26 30 38 0d | 02 a8 32 c8 99 22 4f 53 |,y%,&08.|..2.."OS|
|00000630| 5f 53 70 72 69 74 65 4f | 70 22 2c 33 30 38 2c 73 |_SpriteO|p",308,s|
|00000640| 70 2c 22 6d 69 67 22 2c | 78 25 2b 31 39 32 2c 79 |p,"mig",|x%+192,y|
|00000650| 25 2d 31 30 36 2c 26 30 | 38 0d 02 b2 32 c8 99 22 |%-106,&0|8...2.."|
|00000660| 4f 53 5f 53 70 72 69 74 | 65 4f 70 22 2c 33 30 38 |OS_Sprit|eOp",308|
|00000670| 2c 73 70 2c 22 6d 69 67 | 22 2c 78 25 2b 33 38 34 |,sp,"mig|",x%+384|
|00000680| 2c 79 25 2d 32 30 32 2c | 26 30 38 0d 02 bc 32 c8 |,y%-202,|&08...2.|
|00000690| 99 22 4f 53 5f 53 70 72 | 69 74 65 4f 70 22 2c 33 |."OS_Spr|iteOp",3|
|000006a0| 30 38 2c 73 70 2c 22 6d | 69 67 22 2c 78 25 2b 35 |08,sp,"m|ig",x%+5|
|000006b0| 37 36 2c 79 25 2d 32 39 | 38 2c 26 30 38 0d 02 c6 |76,y%-29|8,&08...|
|000006c0| 22 e7 20 79 25 2d 31 39 | 32 3e 3d 37 34 38 20 8c |". y%-19|2>=748 .|
|000006d0| 20 78 25 3d 31 32 38 30 | 3a 79 25 3d 35 30 30 0d | x%=1280|:y%=500.|
|000006e0| 02 d0 18 e7 20 69 6e 78 | 25 3e 31 35 30 30 20 8c |.... inx|%>1500 .|
|000006f0| 20 69 6e 78 25 3d 30 0d | 02 da 07 fd 20 a3 0d 02 | inx%=0.|.... ...|
|00000700| ee 0a dd 20 f2 65 6e 64 | 0d 03 02 11 ff 20 22 53 |... .end|..... "S|
|00000710| 63 72 6f 6c 6c 4f 66 66 | 22 0d 03 0c 10 ff 20 22 |crollOff|"..... "|
|00000720| 50 6c 61 79 53 74 6f 70 | 22 0d 03 16 20 ff 20 22 |PlayStop|"... . "|
|00000730| 52 75 6e 20 3c 4f 62 65 | 79 24 44 69 72 3e 2e 21 |Run <Obe|y$Dir>.!|
|00000740| 52 75 6e 49 6d 61 67 65 | 22 0d 03 20 05 e1 0d ff |RunImage|".. ....|
+--------+-------------------------+-------------------------+--------+--------+